(rmail-desc-get-header-display-state): Make sure whole header region is

searched for overlays.

diff --git a/lisp/mail/rmaildesc.el b/lisp/mail/rmaildesc.el
index 7d2e1ba4efd0e8b9b93f3cb852966dc9073817bd..cd712bd4f1973af60977969f19cfd3ccb2d15e7d 100644 (file)
--- a/lisp/mail/rmaildesc.el
+++ b/lisp/mail/rmaildesc.el
@@ -310,7 +310,10 @@ If the attribute is not set, return nil."
 
 (defun rmail-desc-get-header-display-state (n)
   "Return t if ignorable headers are being displayed, nil otherwise."
-  (null (overlays-at (rmail-desc-get-start n))))
+  (save-excursion
+    (save-restriction
+      (rmail-narrow-to-header n)
+      (null (overlays-in (point-min) (point-max))))))
 
 (defun rmail-desc-get-keyword (attr-index)
   "Return the keyword string associated with ATTR-INDEX."